home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 65.zip / BS1 part 65 / Prowrite v3.2.4.adf / UnIndent < prev    next >
Text File  |  1992-05-07  |  215b  |  11 lines
  1. /* Un-indent 1/2 inch */
  2. Options results
  3. LeftIndent
  4. newLeft = result - 720/2
  5. If newLeft < 0 Then newLeft = 0
  6. LeftIndent newLeft
  7. LeftMargin
  8. newLeft = result - 720/2
  9. If newLeft < 0 Then newLeft = 0
  10. LeftMargin newLeft
  11.